######################################################################
#
# wt::util package
#
######################################################################

package provide wt::util 1

namespace eval ::wt::util:: {
}

proc ::wt::util::escapeRegexp {str} {
  return [regsub -all {[\(\)\[\]\\\*\+\{\}\^\$\.\?\*]} $str {\\&}]
}
